home *** CD-ROM | disk | FTP | other *** search
/ VRML 2.0 Sourcebook (2nd Edition) / VRML 2.0 Sourcebook CD [md5 fed90f4f9c39d5a60d477058775c7e21].iso / book / unix / ch31 / 31fig08.wrl < prev    next >
Text File  |  1996-09-23  |  565b  |  21 lines
  1. #VRML V2.0 utf8
  2. # The VRML 2.0 Sourcebook
  3. # Copyright [1997] By
  4. # Andrea L. Ames, David R. Nadeau, and John L. Moreland
  5. PROTO BooleanFilter [
  6.     eventIn  SFBool set_boolean
  7.     eventOut SFBool true_changed
  8.     eventOut SFBool false_changed
  9. ] {
  10.     Script {
  11.         eventIn  SFBool set_boolean   IS set_boolean
  12.         eventOut SFBool true_changed  IS true_changed
  13.         eventOut SFBool false_changed IS false_changed
  14.         url "javascript:
  15.             function set_boolean( bool, eventTime ) {
  16.                 if ( bool == true ) { true_changed  = true; }
  17.                 else                { false_changed = true; }
  18.             }"
  19.     }
  20. }
  21.